
% Vojtech Novak, 2011
% Funkce pro vypocet nejkratsich vzdalenosti mezi 2ma vrcholy
% grafu

% graf je reprezentovany matici sousednosti s vahama hran
% vrati matici vzdalenosti a posloupnost hran na cestach


function [minDistances roads] = findShortestPaths(Graf)

len = size(Graf, 1);

minDistances = zeros(len);

for i=1:size(Graf,1)
    for j=1:size(Graf,1)
        if(Graf(i,j) == 0)
            Graf(i,j) = inf;
        end
    end
end

it = 1;

for i=1:len
    for j=i+1:len
        [distance road] = mojeDijkstra(Graf, i, j);
        minDistances(i,j) = distance;
        minDistances(j,i) = distance;
        roads(i,j) = road;
        it = it + 1;
    end
end

end
